home *** CD-ROM | disk | FTP | other *** search
/ PC Graphics Unleashed / PC Graphics Unleashed.iso / ch18 / rad386 / torad.mnu < prev    next >
Encoding:
Text File  |  1993-07-15  |  2.6 KB  |  166 lines
  1. ***Comment
  2.  
  3.         torad.mnu
  4.  
  5.         This file is part of the program torad.lsp to export
  6.         RADIANCE scene description files from Autocad.
  7.  
  8.         Copyright (C) 1993 by Georg Mischler / Lehrstuhl
  9.                               fuer Bauphysik ETH Zurich.
  10.  
  11.         Permission to use, copy, modify, and distribute this software
  12.         for any purpose and without fee is hereby granted, provided
  13.         that the above copyright notice appears in all copies and that
  14.         both that copyright notice and this permission notice appear in
  15.         all supporting documentation.
  16.  
  17.         THIS SOFTWARE IS PROVIDED "AS IS" WITHOUT EXPRESS OR IMPLIED
  18.         WARRANTY.  ALL IMPLIED WARRANTIES OF FITNESS FOR ANY PARTICULAR
  19.         PURPOSE AND OF MERCHANTABILITY ARE HEREBY DISCLAIMED.
  20.  
  21.         Acknowlegdements:
  22.         Final developement of this program has been sponsored by Prof. Dr.
  23.         B. Keller, Building Physics, Dep. for Architekture ETH Zurich.
  24.         The developement environment has been provided by Prof. Dr.
  25.         G. Schmitt, Architecture & CAAD ETH Zurich.
  26.  
  27.  
  28. ***BUTTONS1
  29. ;
  30. ^C^C
  31. ^B
  32. ^O
  33. ^G
  34. ^D
  35. ^E
  36. ^T
  37.  
  38. ***BUTTONS2
  39. $p0=*
  40.  
  41. ***AUX1
  42. ;
  43. ^C^C
  44. ^B
  45. ^O
  46. ^G
  47. ^D
  48. ^E
  49. ^T
  50.  
  51. ***AUX2
  52. $p0=*
  53.  
  54. ***POP0
  55. [Osnap]
  56.  
  57. ***POP1
  58. [File]
  59.  
  60. ***POP2
  61. [Assist]
  62.  
  63. ***POP3
  64. [Draw]
  65.  
  66. ***POP4
  67. [Construct]
  68.  
  69. ***POP5
  70. [Modify]
  71.  
  72. ***POP6
  73. [View]
  74.  
  75. ***POP7
  76. [Settings]
  77.  
  78. ***POP8
  79. [Render]
  80.  
  81. ***POP9
  82. [Model]
  83.  
  84.  
  85. ***SCREEN
  86. **S
  87. [AutoCAD]^C^C^P(ai_rootmenus) ^P
  88. [* * * *]$S=OSNAPB
  89. []
  90. []
  91. []
  92. [TORAD:]^C^C^P(progn (if (null c:torad)(or (and BD4A (load "torad.bi4" NIL))+
  93. (load "torad" NIL)) )(princ)) $S=X $S=TORADs torad
  94. []
  95. []
  96. []
  97. []
  98. []
  99. []
  100. []
  101. []
  102. []
  103. []
  104. []
  105. []
  106. []
  107. []
  108. []
  109. []
  110. []
  111. []
  112. []
  113. []
  114. []
  115. []
  116. []
  117. []
  118. []
  119. []
  120. []
  121. []
  122. []
  123. []
  124. []
  125. []
  126. []
  127.  
  128. **TORADs 3
  129. []
  130. [EXPORT->]
  131. [RADIANCE]
  132. []
  133. [ENTITIES]^C^C^P(progn (toradshowitems T) (princ))
  134. [--------]
  135. [  3dFace]^P(progn (toradsetitem "3DFACE"  T) (princ))
  136. [   Trace]^P(progn (toradsetitem "TRACE"   T) (princ))
  137. [   Solid]^P(progn (toradsetitem "SOLID"   T) (princ))
  138. [  Circle]^P(progn (toradsetitem "CIRCLE"  T) (princ))
  139. [     Arc]^P(progn (toradsetitem "ARC"     T) (princ))
  140. [thikLine]^P(progn (toradsetitem "LINE"    T) (princ))
  141. [thikPlin]^P(progn (toradsetitem "PLINE"   T) (princ))
  142. [widePlin]^P(progn (toradsetitem "WPLINE"  T) (princ))
  143. [ Polygon]^P(progn (toradsetitem "POLYGON" T) (princ))
  144. [  3dMesh]^P(progn (toradsetitem "PMESH"   T) (princ))
  145. [PolyFace]^P(progn (toradsetitem "PFACE"   T) (princ))
  146. [   Point]^P(progn (toradsetitem "POINT"   T) (princ))
  147. []
  148. [MODES   ]
  149. [--------]
  150. [smplMode]^P(progn (setradsamplemode T) (princ))
  151. [#of Segs]^P(progn (setradnumsegs T) (princ))
  152. []
  153. [********]
  154. [ EXPORT ]^C^Ctorad
  155. [********]
  156. []
  157. []
  158. [__LAST__]$S= $S=
  159. []
  160. []
  161. []
  162. []
  163.  
  164. ***Comment
  165.         end of torad.mnu
  166.